"""Build .docx from paper.md + all output tables."""

import re
from pathlib import Path
from docx import Document
from docx.shared import Inches, Pt, Cm, RGBColor
from docx.enum.text import WD_ALIGN_PARAGRAPH
from docx.enum.table import WD_TABLE_ALIGNMENT
from docx.oxml.ns import qn

PROJECT = Path("/mnt/c/demographics_capital_flows/japanification")
TABLES_DIR = PROJECT / "output" / "tables"
PAPER_MD = None
for _name in ["japanification_paper_20260221_v2.md", "japanification_paper_20260221.md", "paper.md"]:
    _p = PROJECT / "paper" / _name
    if _p.exists():
        PAPER_MD = _p
        break
if PAPER_MD is None:
    PAPER_MD = PROJECT / "paper" / "paper.md"
OUTPUT = PROJECT / "paper" / "japanification_paper_20260304_ssrn.docx"

# ── helpers ──────────────────────────────────────────────────────────

def set_cell_text(cell, text, bold=False, size=Pt(9), font_name='Times New Roman'):
    """Set cell text with formatting."""
    cell.text = ""
    p = cell.paragraphs[0]
    p.alignment = WD_ALIGN_PARAGRAPH.CENTER
    run = p.add_run(text)
    run.font.size = size
    run.font.name = font_name
    run.bold = bold

def add_md_table(doc, md_text, title=None):
    """Parse a markdown table and add it as a Word table."""
    lines = [l.strip() for l in md_text.strip().split('\n') if l.strip()]
    table_lines = [l for l in lines if '|' in l and not l.startswith('#')]
    if not table_lines:
        return

    rows = []
    for line in table_lines:
        cells = [c.strip() for c in line.split('|')]
        cells = [c for c in cells if c != '']
        if all(set(c) <= set('-: ') for c in cells):
            continue
        rows.append(cells)

    if len(rows) < 2:
        return

    if title:
        p = doc.add_paragraph()
        run = p.add_run(title)
        run.bold = True
        run.font.size = Pt(11)
        run.font.name = 'Times New Roman'

    n_cols = max(len(r) for r in rows)
    table = doc.add_table(rows=len(rows), cols=n_cols)
    table.style = 'Light Shading'
    table.alignment = WD_TABLE_ALIGNMENT.CENTER

    for i, row_data in enumerate(rows):
        for j, cell_text in enumerate(row_data):
            if j < n_cols:
                is_header = (i == 0)
                set_cell_text(table.cell(i, j), cell_text, bold=is_header)

    doc.add_paragraph()


def parse_md_file(filepath):
    """Parse a .md table file into sections."""
    text = filepath.read_text()
    sections = []

    parts = re.split(r'(```[\s\S]*?```)', text)

    for part in parts:
        if part.startswith('```'):
            content = part.strip('`').strip()
            if content.startswith('\n'):
                content = content[1:]
            sections.append(('irf', content))
        else:
            lines = part.split('\n')
            current_title = None
            table_buf = []

            for line in lines:
                if line.startswith('#'):
                    if table_buf:
                        sections.append(('table', current_title, '\n'.join(table_buf)))
                        table_buf = []
                    current_title = re.sub(r'^#+\s*', '', line).strip()
                elif '|' in line:
                    table_buf.append(line)
                elif line.strip().startswith('*') and not table_buf:
                    sections.append(('note', line.strip()))
                elif line.strip().startswith('-') and not table_buf:
                    sections.append(('note', line.strip()))

            if table_buf:
                sections.append(('table', current_title, '\n'.join(table_buf)))

    return sections


# ── main ──────────────────────────────────────────────────────────────

def build_docx():
    doc = Document()

    for section in doc.sections:
        section.top_margin = Cm(2.54)
        section.bottom_margin = Cm(2.54)
        section.left_margin = Cm(2.54)
        section.right_margin = Cm(2.54)

    style = doc.styles['Normal']
    style.font.name = 'Times New Roman'
    style.font.size = Pt(12)
    style.paragraph_format.space_after = Pt(6)
    style.paragraph_format.line_spacing = 1.15

    # ── Parse paper.md and render ──
    paper_text = PAPER_MD.read_text()
    lines = paper_text.split('\n')

    i = 0
    while i < len(lines):
        line = lines[i]

        if line.startswith('# ') and not line.startswith('## '):
            title = line[2:].strip()
            p = doc.add_heading(title, level=0)
            p.alignment = WD_ALIGN_PARAGRAPH.CENTER
            for run in p.runs:
                run.font.size = Pt(16)
                run.font.name = 'Times New Roman'
                run.font.color.rgb = RGBColor(0, 0, 0)
            # Check for author/date lines immediately after title
            i += 1
            while i < len(lines) and lines[i].strip() == '':
                i += 1
            # Author line (bold markdown)
            if i < len(lines) and lines[i].strip().startswith('**') and lines[i].strip().endswith('**'):
                author = lines[i].strip().strip('*')
                p = doc.add_paragraph()
                p.alignment = WD_ALIGN_PARAGRAPH.CENTER
                run = p.add_run(author)
                run.font.name = 'Times New Roman'
                run.font.size = Pt(14)
                i += 1
                # Skip blanks
                while i < len(lines) and lines[i].strip() == '':
                    i += 1
                # Date line
                if i < len(lines) and lines[i].strip() and not lines[i].startswith('#'):
                    date_text = lines[i].strip()
                    p = doc.add_paragraph()
                    p.alignment = WD_ALIGN_PARAGRAPH.CENTER
                    run = p.add_run(date_text)
                    run.font.name = 'Times New Roman'
                    run.font.size = Pt(12)
                    i += 1
            continue

        if line.startswith('## '):
            heading = line[3:].strip()
            p = doc.add_heading(heading, level=1)
            for run in p.runs:
                run.font.size = Pt(14)
                run.font.name = 'Times New Roman'
                run.font.color.rgb = RGBColor(0, 0, 0)
            i += 1
            continue

        if line.startswith('### '):
            heading = line[4:].strip()
            p = doc.add_heading(heading, level=2)
            for run in p.runs:
                run.font.size = Pt(12)
                run.font.name = 'Times New Roman'
                run.font.color.rgb = RGBColor(0, 0, 0)
            i += 1
            continue

        if line.strip().startswith('$$'):
            stripped = line.strip()
            # Single-line display math: $$...$$
            if stripped.endswith('$$') and len(stripped) > 4:
                math_text = stripped[2:-2].strip()
                i += 1
            else:
                # Multi-line display math
                math_lines = [stripped[2:]]  # strip opening $$
                i += 1
                while i < len(lines) and '$$' not in lines[i]:
                    math_lines.append(lines[i].strip())
                    i += 1
                if i < len(lines):
                    closing = lines[i].strip()
                    if closing == '$$':
                        pass  # just the closing delimiter
                    else:
                        math_lines.append(closing.replace('$$', ''))
                    i += 1
                math_text = ' '.join(l for l in math_lines if l)
            # Handle structured LaTeX BEFORE stripping braces
            def _match_brace(s, start):
                """Match balanced braces starting at s[start] == '{'."""
                if start >= len(s) or s[start] != '{':
                    return None, start
                depth = 0
                for k in range(start, len(s)):
                    if s[k] == '{':
                        depth += 1
                    elif s[k] == '}':
                        depth -= 1
                        if depth == 0:
                            return s[start+1:k], k + 1
                return None, start

            def _replace_frac(s):
                """Replace \\frac{...}{...} with (...)/(...), handling nested braces."""
                out = []
                k = 0
                while k < len(s):
                    if s[k:k+5] == '\\frac' and k + 5 < len(s) and s[k+5] == '{':
                        num, pos = _match_brace(s, k + 5)
                        if num is not None and pos < len(s) and s[pos] == '{':
                            den, pos2 = _match_brace(s, pos)
                            if den is not None:
                                # Recursively handle nested fracs
                                num = _replace_frac(num)
                                den = _replace_frac(den)
                                out.append(f'({num})/({den})')
                                k = pos2
                                continue
                    out.append(s[k])
                    k += 1
                return ''.join(out)

            math_text = _replace_frac(math_text)
            math_text = re.sub(r'\\bar\{([^}]*)\}', lambda m: m.group(1) + '\u0304', math_text)
            math_text = re.sub(r'\\text\{([^}]*)\}', r'\1', math_text)
            math_text = re.sub(r'_\{([^}]+)\}', r'_\1', math_text)
            math_text = re.sub(r'\^\{([^}]+)\}', r'^\1', math_text)
            # Remove leftover braces
            math_text = math_text.replace('{', '').replace('}', '')
            # LaTeX commands → Unicode
            math_text = math_text.replace('\\left', '')
            math_text = math_text.replace('\\right', '')
            math_text = math_text.replace('\\log', 'log')
            math_text = math_text.replace('\\cdot', '\u00b7')
            math_text = math_text.replace('\\cdots', '...')
            math_text = math_text.replace('\\varepsilon', '\u03b5')
            math_text = math_text.replace('\\sigma', '\u03c3')
            math_text = math_text.replace('\\pi', '\u03c0')
            math_text = math_text.replace('\\rho', '\u03c1')
            math_text = math_text.replace('\\alpha', '\u03b1')
            math_text = math_text.replace('\\beta', '\u03b2')
            math_text = math_text.replace('\\gamma', '\u03b3')
            math_text = math_text.replace('\\delta', '\u03b4')
            math_text = math_text.replace('\\Delta', '\u0394')
            math_text = math_text.replace('\\hat', '')
            math_text = math_text.replace('\\widehat', '')
            math_text = math_text.replace('\\sum', '\u03a3')
            math_text = math_text.replace('\\exp', 'exp')
            math_text = math_text.replace('\\times', '\u00d7')
            math_text = math_text.replace("'", '\u2032')
            p = doc.add_paragraph()
            p.alignment = WD_ALIGN_PARAGRAPH.CENTER
            run = p.add_run(math_text)
            run.font.size = Pt(10)
            run.font.name = 'Cambria Math'
            run.italic = True
            continue

        if '|' in line and line.strip().startswith('|'):
            table_lines = []
            while i < len(lines) and '|' in lines[i]:
                table_lines.append(lines[i])
                i += 1
            add_md_table(doc, '\n'.join(table_lines))
            continue

        # Skip horizontal rules
        if line.strip() in ('---', '***', '___'):
            i += 1
            continue

        if line.strip():
            p = doc.add_paragraph()
            text = line.strip()
            # Convert markdown em-dashes
            text = text.replace(' --- ', ' \u2014 ').replace('---', '\u2014')
            parts = re.split(r'(\*\*\*[^*]+\*\*\*|\*\*[^*]+\*\*|\*[^*]+\*|\$[^$]+\$)', text)
            for part in parts:
                if part.startswith('***') and part.endswith('***'):
                    run = p.add_run(part[3:-3])
                    run.bold = True
                    run.italic = True
                    run.font.name = 'Times New Roman'
                    run.font.size = Pt(12)
                elif part.startswith('**') and part.endswith('**'):
                    run = p.add_run(part[2:-2])
                    run.bold = True
                    run.font.name = 'Times New Roman'
                    run.font.size = Pt(12)
                elif part.startswith('*') and part.endswith('*') and len(part) > 2:
                    run = p.add_run(part[1:-1])
                    run.italic = True
                    run.font.name = 'Times New Roman'
                    run.font.size = Pt(12)
                elif part.startswith('$') and part.endswith('$'):
                    math = part[1:-1]
                    math = math.replace('\\hat{\\beta}', '\u03b2\u0302')
                    math = math.replace('\\beta', '\u03b2')
                    math = math.replace('\\Delta', '\u0394')
                    math = math.replace('\\times', '\u00d7')
                    math = re.sub(r'_\{([^}]+)\}', r'_\1', math)
                    math = re.sub(r'\^\{([^}]+)\}', r'^\1', math)
                    run = p.add_run(math)
                    run.italic = True
                    run.font.name = 'Cambria Math'
                    run.font.size = Pt(11)
                else:
                    run = p.add_run(part)
                    run.font.name = 'Times New Roman'
                    run.font.size = Pt(12)

        i += 1

    # ── Page break before appendix tables ──
    doc.add_page_break()
    p = doc.add_heading('Appendix: Tables', level=0)
    p.alignment = WD_ALIGN_PARAGRAPH.CENTER
    for run in p.runs:
        run.font.size = Pt(16)
        run.font.name = 'Times New Roman'
        run.font.color.rgb = RGBColor(0, 0, 0)

    # ── Add all tables ──
    table_files = [
        ("Table 1: Clean Index Construction", "phase7_clean_index_summary.md"),
        ("Table 2: Baseline Estimates (Clean Rolling Index)", "phase7_baseline_clean.md"),
        ("Table 3: Structural Break Decomposition", "phase7_structural_break_decomp.md"),
        ("Table 4: Conditional Projections", "phase7_conditional_projections.md"),
        ("Table 5: Rate Channel Appendix", "phase7_rate_appendix.md"),
    ]

    for table_num, (label, filename) in enumerate(table_files):
        filepath = TABLES_DIR / filename
        if not filepath.exists():
            continue

        doc.add_page_break()

        p = doc.add_heading(label, level=1)
        for run in p.runs:
            run.font.size = Pt(13)
            run.font.name = 'Times New Roman'
            run.font.color.rgb = RGBColor(0, 0, 0)

        sections = parse_md_file(filepath)

        for section in sections:
            if section[0] == 'table':
                _, title, md = section
                if title and title != label:
                    add_md_table(doc, md, title=title)
                else:
                    add_md_table(doc, md)
            elif section[0] == 'note':
                p = doc.add_paragraph()
                run = p.add_run(section[1])
                run.italic = True
                run.font.size = Pt(9)
                run.font.name = 'Times New Roman'

    doc.save(str(OUTPUT))
    print(f"Saved: {OUTPUT}")
    print(f"Size: {OUTPUT.stat().st_size / 1024:.0f} KB")


if __name__ == '__main__':
    build_docx()
